home *** CD-ROM | disk | FTP | other *** search
/ You're the Director / You're The Director.iso / pc / macf / mger.dir / 00263.ls < prev    next >
Encoding:
Text File  |  1995-10-10  |  624 b   |  30 lines
  1. on mouseUp
  2.   global Clips, fullscreenG
  3.   if fullscreenG = 1 then
  4.     puppetSprite(48, 1)
  5.     set the visible of sprite 48 to 0
  6.     puppetSprite(48, 0)
  7.     setbarB()
  8.     ChangeScreenSize(Clips, "160,140", 1)
  9.     repeat with x = 9 to 18
  10.       puppetSprite(x, 1)
  11.       set the visible of sprite x to 1
  12.       puppetSprite(x, 0)
  13.     end repeat
  14.     puppetSprite(20, 1)
  15.     set the visible of sprite 20 to 1
  16.     puppetSprite(20, 0)
  17.     puppetSprite(46, 1)
  18.     set the visible of sprite 46 to 1
  19.     puppetSprite(46, 0)
  20.     updateStage()
  21.     set fullscreenG to 0
  22.   end if
  23.   updateStage()
  24. end
  25.  
  26. on exitFrame
  27.   play done
  28.   go("19")
  29. end
  30.